home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1999 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'FPTAbout.pas' rev: 4.00
-
- #ifndef FPTAboutHPP
- #define FPTAboutHPP
-
- #pragma delphiheader begin
- #pragma option push -w-
- #include <ShellAPI.hpp> // Pascal unit
- #include <StdCtrls.hpp> // Pascal unit
- #include <ExtCtrls.hpp> // Pascal unit
- #include <DsgnIntf.hpp> // Pascal unit
- #include <Dialogs.hpp> // Pascal unit
- #include <Forms.hpp> // Pascal unit
- #include <Controls.hpp> // Pascal unit
- #include <Graphics.hpp> // Pascal unit
- #include <Classes.hpp> // Pascal unit
- #include <SysUtils.hpp> // Pascal unit
- #include <Messages.hpp> // Pascal unit
- #include <Windows.hpp> // Pascal unit
- #include <SysInit.hpp> // Pascal unit
- #include <System.hpp> // Pascal unit
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Fptabout
- {
- //-- type declarations -------------------------------------------------------
- class DELPHICLASS TPTFrmAbout;
- #pragma pack(push, 4)
- class PASCALIMPLEMENTATION TPTFrmAbout : public Forms::TForm
- {
- typedef Forms::TForm inherited;
-
- __published:
- Stdctrls::TLabel* CopyrightTxt;
- Stdctrls::TLabel* ProductTxt;
- Stdctrls::TLabel* VersionTxt;
- Extctrls::TBevel* Bevel1;
- Stdctrls::TButton* Button1;
- Stdctrls::TButton* CloseBtn;
- Extctrls::TPanel* Panel1;
- Extctrls::TImage* Image1;
- Extctrls::TPanel* Panel2;
- void __fastcall Button1Click(System::TObject* Sender);
- void __fastcall FormCreate(System::TObject* Sender);
-
- public:
- /* class method */ static void __fastcall Execute(TMetaClass* vmt, AnsiString aProduct, AnsiString
- aYear, int aVersion, int aPatch);
- /* class method */ static void __fastcall ExecuteCtl(TMetaClass* vmt, AnsiString aProduct,
- AnsiString aYear, AnsiString aCtlName, int aVersion, int aPatch);
- public:
- #pragma option push -w-inl
- /* TCustomForm.Create */ inline __fastcall virtual TPTFrmAbout(Classes::TComponent* AOwner) : Forms::TForm(
- AOwner) { }
- #pragma option pop
- #pragma option push -w-inl
- /* TCustomForm.CreateNew */ inline __fastcall virtual TPTFrmAbout(Classes::TComponent* AOwner, int
- Dummy) : Forms::TForm(AOwner, Dummy) { }
- #pragma option pop
- #pragma option push -w-inl
- /* TCustomForm.Destroy */ inline __fastcall virtual ~TPTFrmAbout(void) { }
- #pragma option pop
-
- public:
- #pragma option push -w-inl
- /* TWinControl.CreateParented */ inline __fastcall TPTFrmAbout(HWND ParentWindow) : Forms::TForm(ParentWindow
- ) { }
- #pragma option pop
-
- };
-
- #pragma pack(pop)
-
- //-- var, const, procedure ---------------------------------------------------
- extern PACKAGE TPTFrmAbout* PTFrmAbout;
-
- } /* namespace Fptabout */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Fptabout;
- #endif
- #pragma option pop // -w-
-
- #pragma delphiheader end.
- //-- end unit ----------------------------------------------------------------
- #endif // FPTAbout
-